home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2001 May / may_2001.iso / intercd / root / Multimedia / Image / ^iShell / setup.exe / Main / ToolsSound.k < prev    next >
Encoding:
Text File  |  2001-03-26  |  2.5 KB  |  81 lines
  1. module oSoundPlugin is cPlugin
  2. has
  3.     release Editor:
  4.         GetIO()
  5.             do
  6.                 result := oIO_SoundPlugin;
  7.             end;
  8.     end;
  9. end;
  10.  
  11. release Editor:
  12.  
  13.     object oIO_SoundLabel is "Sound";
  14.     
  15.     object oIO_SoundPlugin is cIOPlugin
  16.     with
  17.         AboutDialog is cUIAboutPluginDialog
  18.         with
  19.             HelpURL is "Modules/Sound.htm";
  20.             Label is oIO_SoundLabel;
  21.             Text is "Sound gives richer Sound control to iShell, support also streaming audio from the internet.";
  22.         end;
  23.         MenuItems is [
  24.             
  25.             cIO_Sound_TaskMenuItem with Name is "Set Volume";                 Value is oSoundTask_SetVolume; end,
  26.             cIO_Sound_TaskMenuItem with Name is "Push";                     Value is oSoundTask_PushURL; end,
  27.             cIO_Sound_TaskMenuItem with Name is "Purge";                     Value is oSoundTask_Purge; end,
  28.             cIO_Sound_TaskMenuItem with Name is "Pull";                     Value is oSoundTask_Pull; end,
  29.             cIO_Sound_TaskMenuItem with Name is "Run To Time";                Value is oSoundTask_RunToTime; end,
  30. --            cIO_Sound_TaskMenuItem with Name is "Mixing";                     Value is oSoundTask_Mixing; end,
  31. --            cIO_Sound_TaskMenuItem with Name is "Fade To";                     Value is oSoundTask_FadeTo; end,
  32.  
  33.             cIOAttributeGetterMenuItem with Name is "Left Volume";             Value is oGetLeftVolumeAttributeGetter; end,
  34.             cIOAttributeGetterMenuItem with Name is "Right Volume";         Value is oGetRightVolumeAttributeGetter; end,
  35.  
  36.             cIOAttributeGetterMenuItem with Name is "Sound Channel Open";     Value is oSoundChannelOpenAttributeGetter; end,
  37.             cIOAttributeGetterMenuItem with Name is "First Buffer Size";     Value is oFirstBufferSizeAttributeGetter; end,
  38.             cIOAttributeGetterMenuItem with Name is "Next Buffer Size";     Value is oNextBufferSizeAttributeGetter; end,
  39.     
  40.             cIOAttributeSetterMenuItem with Name is "Looping";                 Value is oLoopingAttributeSetter; end,
  41.             cIOAttributeSetterMenuItem with Name is "First Buffer Size";     Value is oFirstBufferSizeAttributeSetter; end,
  42.             cIOAttributeSetterMenuItem with Name is "Next Buffer Size";     Value is oNextBufferSizeAttributeSetter; end
  43.  
  44.         ];
  45.         ElementLines is [
  46.             cIOSeedListLine 
  47.             with 
  48.                 Label is "Model";
  49.                 Lines is [
  50.                     cIOSeedLine with IO is oIOSound; end
  51.                     
  52.                     ];
  53.             end
  54.         ];
  55.         EventLines is [
  56.             cIOSeedListLine 
  57.             with 
  58.                 Label is "Model";
  59.                 Lines is [
  60.                     cIOSeedLine with IO is oIO_SoundEvent; end
  61.                 ];
  62.             end
  63.         ];
  64.         CommandLines is [
  65.             cIOSeedListLine  
  66.             with 
  67.                 Label is "Model";
  68.                 Lines is [
  69.                     cIOSeedLine with IO is oIO_SoundCommand; end
  70.                     
  71.                 ];
  72.             end
  73.         ];
  74.         Openers is [
  75.             oSoundOpener
  76.         ];
  77.     end;
  78.  
  79.  
  80. end; -- release editor
  81.